﻿'Imports Microsoft.Practices.Composite.Wpf.Regions
'Imports Microsoft.Practices.Composite.Regions
'Imports Infragistics.Windows.Ribbon

'Namespace Regions

'    Public Class ApplicationMenuFooterToolbarRegionAdapter
'        Inherits RegionAdapterBase(Of ApplicationMenuFooterToolbar)

'        Protected Overloads Overrides Sub Adapt(ByVal region As Microsoft.Practices.Composite.Regions.IRegion, ByVal regionTarget As ApplicationMenuFooterToolbar)

'            regionTarget.ItemsSource = region.ActiveViews

'        End Sub



'        Protected Overrides Function CreateRegion() As Microsoft.Practices.Composite.Regions.IRegion
'            Return New AllActiveRegion
'        End Function


'    End Class

'End Namespace